home *** CD-ROM | disk | FTP | other *** search
- object Form15: TForm15
- Left = 250
- Top = 53
- BorderStyle = bsNone
- Caption = 'G�sterilen Sat�l�k Emlaklar'
- ClientHeight = 500
- ClientWidth = 400
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- OldCreateOrder = False
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Image1: TImage
- Left = 0
- Top = 0
- Width = 400
- Height = 500
- AutoSize = True
- Picture.Data = {<image000.jpg>}
- OnMouseDown = Image1MouseDown
- end
- object Label1: TLabel
- Left = 50
- Top = 120
- Width = 50
- Height = 13
- Caption = 'Ad� Soyad�'
- Transparent = True
- end
- object Label2: TLabel
- Left = 50
- Top = 144
- Width = 24
- Height = 13
- Caption = 'Tarih'
- Transparent = True
- end
- object Label3: TLabel
- Left = 50
- Top = 168
- Width = 58
- Height = 13
- Caption = 'Ev Telefonu'
- Transparent = True
- end
- object Label4: TLabel
- Left = 50
- Top = 192
- Width = 53
- Height = 13
- Caption = '�� Telefonu'
- Transparent = True
- end
- object Label5: TLabel
- Left = 50
- Top = 216
- Width = 64
- Height = 13
- Caption = 'Cep Telefonu'
- Transparent = True
- end
- object Label6: TLabel
- Left = 50
- Top = 240
- Width = 27
- Height = 13
- Caption = 'Adres'
- Transparent = True
- end
- object Image2: TImage
- Left = 248
- Top = 120
- Width = 97
- Height = 33
- Picture.Data = {<image001.bmp>}
- Stretch = True
- end
- object Image3: TImage
- Left = 248
- Top = 176
- Width = 97
- Height = 33
- Picture.Data = {<image002.bmp>}
- Stretch = True
- end
- object Image4: TImage
- Left = 248
- Top = 120
- Width = 97
- Height = 33
- Picture.Data = {<image003.jpg>}
- Stretch = True
- Visible = False
- end
- object Image5: TImage
- Left = 248
- Top = 176
- Width = 97
- Height = 33
- Picture.Data = {<image004.jpg>}
- Stretch = True
- Visible = False
- end
- object Label7: TLabel
- Left = 253
- Top = 128
- Width = 89
- Height = 22
- Alignment = taCenter
- AutoSize = False
- Caption = 'Liste'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clLime
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- OnMouseDown = Label7MouseDown
- OnMouseUp = Label7MouseUp
- end
- object Label8: TLabel
- Left = 253
- Top = 184
- Width = 89
- Height = 22
- Alignment = taCenter
- AutoSize = False
- Caption = '��k��'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clLime
- Font.Height = -13
- Font.Name = 'MS Sans Serif'
- Font.Style = [fsBold]
- ParentFont = False
- Transparent = True
- OnMouseDown = Label8MouseDown
- OnMouseUp = Label8MouseUp
- end
- object DBNavigator1: TDBNavigator
- Left = 36
- Top = 64
- Width = 330
- Height = 18
- DataSource = DataSource1
- TabOrder = 10
- end
- object DBEdit1: TDBEdit
- Left = 120
- Top = 112
- Width = 121
- Height = 21
- DataField = 'AdiSoyadi'
- DataSource = DataSource1
- TabOrder = 0
- OnKeyPress = DBEdit1KeyPress
- end
- object DBEdit2: TDBEdit
- Left = 120
- Top = 136
- Width = 121
- Height = 21
- DataField = 'Tarih'
- DataSource = DataSource1
- TabOrder = 1
- OnKeyPress = DBEdit1KeyPress
- end
- object DBEdit3: TDBEdit
- Left = 120
- Top = 160
- Width = 121
- Height = 21
- DataField = 'Ev Tel'
- DataSource = DataSource1
- MaxLength = 15
- TabOrder = 2
- OnKeyPress = DBEdit1KeyPress
- end
- object DBEdit4: TDBEdit
- Left = 120
- Top = 184
- Width = 121
- Height = 21
- DataField = 'IsTel'
- DataSource = DataSource1
- MaxLength = 15
- TabOrder = 3
- OnKeyPress = DBEdit1KeyPress
- end
- object DBEdit5: TDBEdit
- Left = 120
- Top = 208
- Width = 121
- Height = 21
- DataField = 'Ceptel'
- DataSource = DataSource1
- MaxLength = 15
- TabOrder = 4
- OnKeyPress = DBEdit1KeyPress
- end
- object DBMemo1: TDBMemo
- Left = 120
- Top = 232
- Width = 217
- Height = 25
- DataField = 'Adres'
- DataSource = DataSource1
- TabOrder = 5
- OnKeyPress = DBEdit1KeyPress
- end
- object DBMemo2: TDBMemo
- Left = 64
- Top = 352
- Width = 273
- Height = 25
- DataField = 'G1'
- DataSource = DataSource1
- TabOrder = 6
- OnKeyPress = DBEdit1KeyPress
- end
- object DBMemo3: TDBMemo
- Left = 64
- Top = 380
- Width = 273
- Height = 25
- DataField = 'G2'
- DataSource = DataSource1
- TabOrder = 7
- OnKeyPress = DBEdit1KeyPress
- end
- object DBMemo4: TDBMemo
- Left = 64
- Top = 408
- Width = 273
- Height = 25
- DataField = 'G3'
- DataSource = DataSource1
- TabOrder = 8
- OnKeyPress = DBEdit1KeyPress
- end
- object DBMemo5: TDBMemo
- Left = 64
- Top = 436
- Width = 273
- Height = 25
- DataField = 'G4'
- DataSource = DataSource1
- TabOrder = 9
- OnKeyPress = DBEdit1KeyPress
- end
- object DataSource1: TDataSource
- DataSet = Table1
- Left = 56
- Top = 8
- end
- object Table1: TTable
- Active = True
- AfterPost = Table1AfterPost
- TableName = 'gosterilensd.db'
- Left = 96
- Top = 8
- object Table1AdiSoyadi: TStringField
- FieldName = 'AdiSoyadi'
- end
- object Table1Tarih: TStringField
- FieldName = 'Tarih'
- Size = 10
- end
- object Table1EvTel: TStringField
- FieldName = 'Ev Tel'
- EditMask = '!\(999\) 999-99-99;1;_'
- end
- object Table1IsTel: TStringField
- FieldName = 'IsTel'
- EditMask = '!\(999\) 999-99-99;1;_'
- end
- object Table1Ceptel: TStringField
- FieldName = 'Ceptel'
- EditMask = '!\(999\) 999-99-99;1;_'
- end
- object Table1Adres: TMemoField
- FieldName = 'Adres'
- BlobType = ftMemo
- Size = 50
- end
- object Table1G1: TMemoField
- FieldName = 'G1'
- BlobType = ftMemo
- Size = 50
- end
- object Table1G2: TMemoField
- FieldName = 'G2'
- BlobType = ftMemo
- Size = 50
- end
- object Table1G3: TMemoField
- FieldName = 'G3'
- BlobType = ftMemo
- Size = 50
- end
- object Table1G4: TMemoField
- FieldName = 'G4'
- BlobType = ftMemo
- Size = 50
- end
- object Table1Gosterilensno: TAutoIncField
- FieldName = 'Gosterilensno'
- ReadOnly = True
- end
- end
- end
-